﻿Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        For a = 1 To 10
            MsgBox(Now.ToLongTimeString)
            MsgBox(Now.ToLongTimeString)
        Next

    End Sub
End Class
